home *** CD-ROM | disk | FTP | other *** search
/ SVM Mac CD-ROM 59 / SVM Mac CD-ROM - No 59.iso / demo camisole / Quai.Dxr / 00626_cliquer l'intrus.ls < prev    next >
Encoding:
Text File  |  1999-04-06  |  314 b   |  13 lines
  1. on mouseDown
  2.   global gNumIntrus, gListeDechets, gDecalageSprite
  3.   set vNumSprite to the clickOn
  4.   if getAt(gListeDechets, vNumSprite - gDecalageSprite) = 30 then
  5.     puppetSound("Jingle reussite")
  6.   else
  7.     puppetSound("poubelle ECHEC", 1)
  8.     set gNumIntrus to 0
  9.   end if
  10.   CursReset(1)
  11.   go(the frame + 2)
  12. end
  13.